IF exists(SELECT * FROM dbo.sysobjects WHERE name='WEB_klas' AND xtype='P') 
BEGIN
	DROP PROCEDURE WEB_klas
END
GO

CREATE    procedure WEB_klas
(@iNr char(7))
as
set nocount on

declare @klas varchar(5)
set @klas=dbo.WEB_klasnaam(@iNr)

--De hoofding
select -2 as volgNr,'<?xml version="1.0"  encoding="ISO-8859-1" ?>' as tekst
union 
select -1,'<klas klasNaam = "' + @klas + '">'
union
select 0,'<klasleraar naamcode = "' + k.naamcode + '">' + isNull(l.voornaam,'') 
	+ ' ' + isNull(l.achternaam,'') + '</klasleraar>'
	from leraars..klasleraars as k
	left join leraars..leraars as l on l.naamcode = k.naamcode
	where k.klas = @klas
union 
select klasNr, '<leerling iNr = "' + inschrijvingsNr + '"><nr>' 
	+ convert(varchar(3),klasNr) + '</nr><voornaam>' + isNull(voornaam ,'')
  	+ '</voornaam><achternaam>' + isNull(achternaam,'') + '</achternaam></leerling>'
from leerlingen 
where klas = @klas
union
select 999,'</klas>'
order by volgNr